home *** CD-ROM | disk | FTP | other *** search
/ Play Windows 1995 October / CD [playwin].bin / mac / demo / 00065.ls < prev    next >
Encoding:
Text File  |  1995-08-11  |  260 b   |  14 lines
  1. on mouseUp
  2.   puppetSprite(10, 1)
  3.   set the castNum of sprite 10 to 23
  4.   updateStage()
  5.   sound playFile 1, "click"
  6.   repeat while soundBusy(1)
  7.     nothing()
  8.   end repeat
  9.   set the castNum of sprite 10 to 15
  10.   updateStage()
  11.   puppetSprite(10, 0)
  12.   go("pcd")
  13. end
  14.